﻿
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="GetHistory.aspx.vb" Inherits="GetDocuments" %>


    <% 
    dim valeur as string
    dim texteretour as string
        valeur = Request.QueryString("ID")
        texteretour = RecupHistorique(valeur)
        Response.ContentType = "text/xml"
        Response.Write(texteretour)
    %>
    
  